Google¥¹¥×¥ì¥Ã¥É¥·©`¥È

GoogleDrive¤Ø¤Î¥í¥°¥¤¥ó

Google Drive¤Ë¥í¥°¥¤¥ó¤¹¤ë¤¿¤á¤ÎÕJÔ^¤ògs_auth(new_user = TRUE)¤ÇÐФ¦¡£ ŒgÐФ¹¤ë¤ÈGoogle¤Ø¤Î¥í¥°¥¤¥ó¤Ègooglesheets¤Ë¤è¤ëÔS¿É¤Î¥ê¥¯¥¨¥¹¥È»­Ã椬¥Ö¥é¥¦¥¶¤Ë±íʾ¤µ¤ì¤ë¡£

library(googlesheets)
gs_auth(new_user = TRUE)

»ù±¾µÄ¤Êʹ¤¤·½

• gs_ls¤ÇGoogle Drive¤Ë±£´æ¤µ¤ì¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¥ê¥¹¥È¤òÈ¡µÃ¤¹¤ë¡£
• gs_title¤Ç¥¹¥×¥ì¥Ã¥É¥·©`¥È¤òÖ¸¶¨¤¹¤ë
• gs_ws_ls¤ÇÖ¸¶¨¤·¤¿¥¹¥×¥ì¥Ã¥É¥·©`¥È¤Î¥ï©`¥¯¥·©`¥ÈÃûÇ°¤ò±íʾ
• gs_read¤ÇÖ¸¶¨¤·¤¿¥¹¥×¥ì¥Ã¥É¥·©`¥È¤ò¥¤¥ó¥Ý©`¥È£¨tibbleÐÎʽ£©
• gs_browse¤ÇÖ¸¶¨¤·¤¿¥¹¥×¥ì¥Ã¥É¥·©`¥È¤ò¥Ö¥é¥¦¥¶¤Ç±íʾ

gs_ls()
mysheet <- gs_title("¥¹¥×¥ì¥Ã¥É¥·©`¥ÈÃûÇ°")
gs_ws_ls(ss = mysheet)
d <- gs_read(mysheet)
gs_browse(mysheet)